function LongDiv(X: Longint; Y: Integer): Integer;
inline($59/$58/$5A/$F7/$F9);

function LongWDiv(X: Longint; Y: Word): Word;
inline($59/$58/$5A/$F7/$F1);

function longmul(X, Y: Integer): Longint;
inline($5A/$58/$f7/$EA);

